/*This do file is for the 1900 regression estimates
it is meant to be used with the file
1900_Data.dta

*/

#delimit;

 
//This portion is for the 1900 education estimates attend school-- age 10 to 18



dprobit school_dum black CherNat cherfr if age>=10 & age<=18 [pweight= hhwt1];


outreg2 using 1880pvals, ctitle(Model) bdec(2) tdec(2) rdec(2) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket replace;



dprobit school_dum black CherNat cherfr age age2 male famsize  if age>=10 & age<=18  [pweight= hhwt1 ];
outreg2 using 1880pvals, ctitle(Model) bdec(2) tdec(2) rdec(2) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;



dprobit school_dum black CherNat cherfr age age2 male famsize head_lit head_farmer head_own if age>=10 & age<=18  [pweight= hhwt1 ];
outreg2 using 1880pvals, ctitle(Model) bdec(2) tdec(2) rdec(2) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;



// school months-- age 10 to 18

reg  school_month  black CherNat cherfr if school_dum==1 & age>=10 & age<=18 [pweight= hhwt1 ];
outreg2 using 1880pvals, ctitle(Model) bdec(2) tdec(2) rdec(2) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_a)) addnote() word  bracket ;


reg  school_month  black CherNat cherfr age age2 male famsize  if school_dum==1 & age>=10 & age<=18  [pweight= hhwt1 ];
outreg2 using 1880pvals, ctitle(Model) bdec(2) tdec(2) rdec(2) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_a)) addnote() word  bracket ;



reg  school_month  black CherNat cherfr age age2 male famsize head_lit head_farmer head_own if school_dum==1 & age>=10 & age<=18  [pweight= hhwt1 ];
outreg2 using 1880pvals, ctitle(Model) bdec(2) tdec(2) rdec(2) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_a)) addnote() word  bracket ;

//literacy-- age 10 to 18


dprobit  lit_dum  black CherNat cherfr if  age>=10 & age<=18  [pweight= hhwt1 ];
outreg2 using 1880pvals, ctitle(Model) bdec(2) tdec(2) rdec(2) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;


dprobit  lit_dum  black CherNat cherfr age age2 male famsize  if   age>=10 & age<=18  [pweight= hhwt1 ];
outreg2 using 1880pvals, ctitle(Model) bdec(2) tdec(2) rdec(2) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;



dprobit  lit_dum black CherNat cherfr age age2 male famsize head_lit head_farmer head_own if  age>=10 & age<=18  [pweight= hhwt1 ];
outreg2 using 1880pvals, ctitle(Model) bdec(2) tdec(2) rdec(2) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;

// literacy-- 18+



dprobit  lit_dum  black CherNat cherfr if age>18  [pweight= hhwt1 ];
outreg2 using 1880pvals, ctitle(Model) bdec(2) tdec(2) rdec(2) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;


dprobit  lit_dum  black CherNat cherfr age age2 male  if  age>18  [pweight= hhwt1 ];
outreg2 using 1880pvals, ctitle(Model) bdec(2) tdec(2) rdec(2) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;



/*This portion is for the 1900 d-in-d estimates for racial inequality
// it is also meant to be used with the file
//1900_Data.dta

//Homewonership

*/

#delimit;

dprobit own black CherNat cherfr if male==1 & head==1  [pweight=hhwt1];
outreg2 using 1880pvals, ctitle(Model) bdec(4) tdec(4) rdec(4) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket replace ;

dprobit own black CherNat cherfr age age2 lit_dum famsize  if male==1 & head==1  [pweight=hhwt1];
outreg2 using 1880pvals, ctitle(Model) bdec(4) tdec(4) rdec(4) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;

dprobit own black CherNat cherfr age age2 lit_dum famsize head_farmer if male==1 & head==1 [pweight=hhwt1];
outreg2 using 1880pvals, ctitle(Model) bdec(4) tdec(4) rdec(4) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;


//Now mortgages

dprobit head_nomort black CherNat cherfr if male==1 & head==1 [pweight=hhwt1];
outreg2 using 1880pvals, ctitle(Model) bdec(4) tdec(4) rdec(4) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;

dprobit head_nomort black CherNat cherfr age age2 lit_dum famsize  if male==1 & head==1  [pweight=hhwt1];
outreg2 using 1880pvals, ctitle(Model) bdec(4) tdec(4) rdec(4) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;

dprobit head_nomort black CherNat cherfr age age2 lit_dum famsize head_farmer if male==1 & head==1  [pweight=hhwt1];
outreg2 using 1880pvals, ctitle(Model) bdec(4) tdec(4) rdec(4) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;

//Now farmers

dprobit head_farmer black CherNat cherfr  if male==1 & head==1  [pweight=hhwt1];
outreg2 using 1880pvals, ctitle(Model) bdec(4) tdec(4) rdec(4) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;

dprobit head_farmer black CherNat cherfr age age2 lit_dum famsize  if male==1 & head==1  [pweight=hhwt1];
outreg2 using 1880pvals, ctitle(Model) bdec(4) tdec(4) rdec(4) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;

//do farmers own homes


dprobit own black CherNat cherfr if head_farmer==1 & male==1 & head==1  [pweight=hhwt1];
outreg2 using 1880pvals, ctitle(Model) bdec(4) tdec(4) rdec(4) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;

dprobit own black CherNat cherfr age age2 lit_dum famsize  if head_farmer==1 & male==1 & head==1  [pweight=hhwt1];
outreg2 using 1880pvals, ctitle(Model) bdec(4) tdec(4) rdec(4) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;

dprobit own black CherNat cherfr age age2 lit_dum famsize if head_farmer==1 & male==1 & head==1 [pweight=hhwt1];
outreg2 using 1880pvals, ctitle(Model) bdec(4) tdec(4) rdec(4) alpha(.001, .01, .05) addstat(Pseudo R2, e(r2_p)) addnote() word  bracket ;



  
